home *** CD-ROM | disk | FTP | other *** search
/ SOHO - Exploring the Sun - 2003 Update / SOHO - Exploring the Sun - 2003 Update.iso / pc / data / main.dcr / scripts_55.ls < prev    next >
Encoding:
Text File  |  2003-02-25  |  910 b   |  34 lines
  1. on exitFrame
  2.   global nappi_sprite, us, uss, fade_count, fade_limit
  3.   LiveRollOver(103, 103, 0)
  4.   DefCurs()
  5.   set fade_limit to 3
  6.   if fade_count < fade_limit then
  7.     set fade_count to fade_count + 1
  8.   end if
  9.   if the puppet of sprite nappi_sprite = 0 then
  10.     set the puppet of sprite nappi_sprite to 1
  11.   end if
  12.   set us to 0
  13.   set uss to 0
  14.   cov_test_a(2, 184, "soho_c1", "soho")
  15.   cov_test_a(3, 248, "soho_c2", "soho")
  16.   cov_test_a(4, 314, "soho_c3", "soho")
  17.   cov_test_a(5, 380, "soho_c4", "soho")
  18.   cov_test(2, 184, "soho_c1", "soho")
  19.   cov_test(3, 248, "soho_c2", "soho")
  20.   cov_test(4, 314, "soho_c3", "soho")
  21.   cov_test(5, 380, "soho_c4", "soho")
  22.   if us = 1 then
  23.     set the locH of sprite nappi_sprite to 460
  24.   else
  25.     if the locV of sprite nappi_sprite < 480 then
  26.       set the locV of sprite nappi_sprite to 490
  27.     end if
  28.   end if
  29.   if uss = 1 then
  30.     updateStage()
  31.   end if
  32.   go(the frame)
  33. end
  34.